10 REM CREATE RELATIVE USER STATUS FILE
20 OPEN15,8,15:OPEN1,8,2,"USTAT,L,"+CHR$(86)
30 PRINT#15,"P"+CHR$(98)+CHR$(244)+CHR$(1)+CHR$(1)
40 PRINT#1,"@END"
50 CLOSE1:CLOSE15
60 END